home *** CD-ROM | disk | FTP | other *** search
/ Amiga Format CD 43 / Amiga Format CD43 (1999)(Future Publishing)(GB)(Track 1 of 2)[!][issue 1999-09].iso / -in_the_mag- / workbench / sql / sqldb / rexxmacros / sqltest3.rexx < prev    next >
OS/2 REXX Batch file  |  1999-06-29  |  303b  |  13 lines

  1. /* sqltest3.rexx */
  2. options results
  3. address 'SQLserver'
  4.  
  5. 'ExecSQL' 'open table salesreps;'
  6. 'ExecSQL' 'declare testcur cursor for select from salesreps;'
  7. 'ExecSQL' 'open testcur;'
  8. 'ExecSQL' 'fetch columns of testcur;'
  9. say 'result = ' result
  10. 'ExecSQL' 'close testcur;'
  11. 'ExecSQL' 'close table salesreps;'
  12.  
  13.